home *** CD-ROM | disk | FTP | other *** search
/ AMIGA-CD 2 / Amiga-CD - Volume 2.iso / rms_katalog / rms-katalog_2.x+ < prev    next >
Text File  |  1995-06-01  |  3KB  |  70 lines
  1. failat 21
  2. stack 8000
  3. copy >NIL: :RMS_Katalog/RMSFiles/mm ram:
  4.  
  5.  
  6. ;if not exists ram:T
  7.     copy :RMS_Katalog/RMSFiles/Schubi TO ram:T QUIET ;dummy Verzeichnis
  8.     assign T: ram:T
  9. endif
  10.  
  11. ;if not exists ram:ENV
  12.     copy :RMS_Katalog/RMSFiles/Schubi TO ram:ENV QUIET
  13.     assign ENV: ram:Env
  14. endif
  15.  
  16. version >NIL:
  17. setenv Workbench $Workbench
  18. setenv Kickstart $Kickstart
  19.  
  20. echo "    *n*e[1;32m    ____________________________________________________________________"
  21. echo "    *e[43m                                                                    *e[0m"
  22. echo "    *e[0;32;43m                            RHEIN-MAIN-SOFT       *e[1m                  *e[0m"
  23. echo "    *e[0;32;43m                                                  *e[1m                  *e[0m"
  24. echo "    *e[0;32;43m                                KATALOG           *e[1m                  *e[0m"
  25. echo "    *e[0;32;43m                                                  *e[1m                  *e[0m"
  26. echo "    *e[0;32;43m                         KICKSTART 2.x VERSION    *e[1m                  *e[0m"
  27. echo "    *e[1;4;43m                                                                    *e[0m"
  28. ram:mm :RMS_Katalog/RMSFiles/angebot
  29. ram:mm :RMS_Katalog/RMSFiles/angebot1
  30. wait 4
  31.  
  32.  
  33. eval $Kickstart >Env:Kick  ;Ganzzahl erzeugen
  34. ;if $Kick GE 37 VAL
  35.  
  36. :c/cls
  37.  
  38.     echo "    *n*n    Lade den Katalog..."
  39.     assign libs:  :RMS_Katalog/RMSFiles ADD
  40. :c/cls
  41.  
  42.     :RMS_Katalog/RMSmenu >NIL:
  43. :RMS_Katalog/RMSFILES/psx CLOSE RMSmenu
  44.  
  45.     wait 2
  46.     echo "    *n*n*n        Sollten Sie noch Fragen haben, setzen Sie Sich bitte mit uns"
  47.     echo "        unter folgender Adresse in Verbindung:*n*n"
  48.     echo "    *e[32m                          Rhein-Main-Soft *e[0m"
  49.     echo "    *e[32m                           Postfach 2167 *e[0m"
  50.     echo "    *e[32m                         D-61411 Oberursel *e[0m"
  51.     echo "    *e[32m                 Tel: 06171/581000 Fax:06171/581001 *e[0m"
  52.  
  53.     wait 4
  54.     endcli
  55.  
  56. else
  57.  
  58.     echo "    *n*n        Tut mit leid, dieses Katalog-Menü läuft erst ab Kickstart 2.x"
  59.     echo "        Benötigen Sie ein Katalog-Set für Kickstart 1.3, dann setzen Sie"
  60.     echo "        Sich bitte mit uns unter folgender Adresse in Verbindung:*n*n"
  61.     echo "    *e[32m                          Rhein-Main-Soft *e[0m"
  62.     echo "    *e[32m                           Postfach 2167 *e[0m"
  63.     echo "    *e[32m                         D-61411 Oberursel *e[0m"
  64.     echo "    *e[32m                 Tel: 06171/581000 Fax:06171/581001 *e[0m"
  65.  
  66.     wait 4
  67.     endcli
  68.  
  69. endif
  70.